home *** CD-ROM | disk | FTP | other *** search
/ Private Obsession 3: Sophia / Private Obsession 3: Sophia.iso / files / sshots.dxr / 00107.ls < prev    next >
Encoding:
Text File  |  1995-04-08  |  584 b   |  30 lines
  1. on mouseDown
  2.   global cual1
  3.   if cual1 = 7 then
  4.     puppetSound("oohyes")
  5.   else
  6.     if cual1 = 16 then
  7.       puppetSound("sound2")
  8.     else
  9.       if cual1 = 24 then
  10.         puppetSound("fukmenow")
  11.       else
  12.         if cual1 = 32 then
  13.           puppetSound("scream2")
  14.         else
  15.           if cual1 = 42 then
  16.             puppetSound("sound3")
  17.           else
  18.             if cual1 = 52 then
  19.               puppetSound("scream1")
  20.               set cual1 to 0
  21.             end if
  22.           end if
  23.         end if
  24.       end if
  25.     end if
  26.   end if
  27.   set cual1 to cual1 + 1
  28.   go("Play1")
  29. end
  30.